(apropos-command): Ignore documentation errors. (Bug#825)

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 0f00d2d36171a2c5cdee74db47b32e10b26e42fc..a0ac773cd2396a8cb6a289ef730ff7bc96d8d75a 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -489,7 +489,7 @@ while a list of strings is used as a word list."
                   (setq score (apropos-score-symbol symbol))
                   (unless var-predicate
                     (if (fboundp symbol)
-                        (if (setq doc (documentation symbol t))
+                        (if (setq doc (ignore-errors (documentation symbol t)))
                             (progn
                               (setq score (+ score (apropos-score-doc doc)))
                               (substring doc 0 (string-match "\n" doc)))